package com.ld.admin.shiro.filter;

import java.io.Serializable;
import java.util.ArrayDeque;
import java.util.Deque;

import javax.servlet.ServletRequest;
import javax.servlet.ServletResponse;
import javax.servlet.http.HttpServletRequest;

import org.apache.lucene.util.RamUsageEstimator;
import org.apache.shiro.cache.Cache;
import org.apache.shiro.cache.CacheManager;
import org.apache.shiro.session.Session;
import org.apache.shiro.subject.Subject;
import org.apache.shiro.web.filter.AccessControlFilter;
import org.apache.shiro.web.util.WebUtils;

import com.ld.admin.model.system.SystemUser;
import com.ld.admin.service.user.IUserService;
import com.ld.admin.service.user.UserService;
import com.ld.admin.shiro.ShiroUtils;
import com.ld.common.util.LogUtil;
import com.ld.shieldsb.common.core.model.PropertiesModel;
import com.ld.shieldsb.common.core.util.SpringContextHolder;

import lombok.extern.slf4j.Slf4j;

/**
 * 
 * 限制登录个数
 * 
 * @author <a href="mailto:donggongai@126.com" target="_blank">吕凯</a>
 * @date 2020年10月20日 下午3:23:56
 *
 */
@Slf4j
public class KickoutSessionControlFilter extends AccessControlFilter {

    private String kickoutUrl; // 踢出后到的地址
    private boolean kickoutAfter = false; // 踢出之前登录的/之后登录的用户 默认false 踢出之前登录的用户
    private int maxSession = 1; // 同一个帐号最大会话数 默认1

    private Cache<String, Deque<Serializable>> sessionIdcache;
    private Cache<String, Boolean> kickoutIdCache;
    private Cache<String, Session> sessionsCache;

    public KickoutSessionControlFilter() {
        kickoutUrl = PropertiesModel.CONFIG.getString("shiro.kickout.kickout-url"); //
        kickoutAfter = PropertiesModel.CONFIG.getBoolean("shiro.kickout.kickout-after", false); //
        maxSession = PropertiesModel.CONFIG.getInt("shiro.kickout.max-session", 1); //
    }

    // 使用名称获取，不建议使用类型，名称可以在config配置类中覆盖
    protected IUserService userService = null;

    protected IUserService getUserService() {
        if (userService == null) {
            userService = SpringContextHolder.getBeanByClassName(UserService.class);
        }
        return userService;
    }

    public void setKickoutUrl(String kickoutUrl) {
        this.kickoutUrl = kickoutUrl;
    }

    public void setKickoutAfter(boolean kickoutAfter) {
        this.kickoutAfter = kickoutAfter;
    }

    public void setMaxSession(int maxSession) {
        this.maxSession = maxSession;
    }

    // 设置Cache的key的前缀
    public void setCacheManager(CacheManager cacheManager) {
        // 必须和ehcache缓存配置中的缓存name一致
        this.sessionIdcache = cacheManager.getCache("shiro-activeSessionIdCache");
        this.kickoutIdCache = cacheManager.getCache("shiro-kickoutIdCache");
        this.sessionsCache = cacheManager.getCache("shiro-allSessionsCache");
    }

    /**
     * 是否允许访问，返回true表示允许
     */
    @Override
    protected boolean isAccessAllowed(ServletRequest request, ServletResponse response, Object mappedValue) throws Exception {
        return false;
    }

    /**
     * 表示访问拒绝时是否自己处理，如果返回true表示自己不处理且继续拦截器链执行，返回false表示自己已经处理了（比如重定向到另一个页面）。
     */
    @Override
    protected boolean onAccessDenied(ServletRequest request, ServletResponse response) throws Exception {
        HttpServletRequest httpRequest = WebUtils.toHttp(request);
        Subject subject = getSubject(request, response);
        // 没有登录授权 且没有记住我
        if (!subject.isAuthenticated() && !subject.isRemembered()) {
            // 如果没有登录，直接进行之后的流程
            return true;
        }
        Session session = subject.getSession();
        System.out.println(httpRequest.getSession());
        log.debug("==session时间设置：" + String.valueOf(session.getTimeout()) + "===========");
        try {
            // 这里获取的User是实体 因为我在 自定义ShiroRealm中的doGetAuthenticationInfo方法中
            // new SimpleAuthenticationInfo(user, password, getName()); 传的是 User实体 所以这里拿到的也是实体,如果传的是userName 这里拿到的就是userName
            String username = ((SystemUser) subject.getPrincipal()).getLoginCode();
//            String username = subject.getPrincipal() + ""; //如果保存的是用户名则直接取
            log.debug("===当前用户username：==" + username);
            Serializable sessionId = session.getId();
            log.debug("===当前用户sessionId：==" + sessionId);
            // 读取缓存用户 没有就存入
            Deque<Serializable> deque = sessionIdcache.get(username);
            log.debug("===当前deque：==" + deque);
            if (deque == null) {
                // 初始化队列
                deque = new ArrayDeque<>();
            }
            // 如果队列里没有此sessionId，且用户没有被踢出；放入队列
            if (!deque.contains(sessionId) && kickoutIdCache.get(sessionId.toString()) == null) {
                // 将sessionId存入队列
                deque.push(sessionId);
                // 将用户的sessionId队列缓存
                sessionIdcache.put(username, deque);
            }
            System.out.println("size sessionCache=" + RamUsageEstimator.humanSizeOf(kickoutIdCache));
            System.out.println("size cache=" + RamUsageEstimator.humanSizeOf(sessionIdcache));

            // 如果队列里的sessionId数超出最大会话数，开始踢人
            while (deque.size() > maxSession) {
                log.debug("===deque队列长度：==" + deque.size());
                Serializable kickoutSessionId = null;
                // 是否踢出后来登录的，默认是false；即后者登录的用户踢出前者登录的用户；
                if (kickoutAfter) { // 如果踢出后者
                    kickoutSessionId = deque.removeFirst();
                } else { // 否则踢出前者
                    kickoutSessionId = deque.removeLast();
                }
                // 踢出后再更新下缓存队列
                sessionIdcache.put(username, deque);
                kickoutIdCache.put(kickoutSessionId.toString(), true);
                /*try {
                    // 获取被踢出的sessionId的session对象,WebSessionKey为web对象
                    Session kickoutSession = kickoutIdCache.get("session_" + kickoutSessionId);
                    if (kickoutSession != null) {
                        // 设置会话的kickout属性表示踢出了
                        kickoutSession.setAttribute("kickout", true);
                    }
                } catch (Exception e) {
                    log.error("", e);
                }*/
            }

            // 如果被踢出了，(前者或后者)直接退出，重定向到踢出后的地址
            if (kickoutIdCache.get(sessionId.toString()) != null && kickoutIdCache.get(sessionId.toString()) == true) {
                kickoutIdCache.remove(sessionId.toString()); // 处理过就移除
                // ajax 的请求头里有X-Requested-With: XMLHttpRequest 正常请求没有
                if (ShiroUtils.isAjax(request)) { // ajax请求
                    ShiroUtils.sendJsonErrMsg(response, "您的账号在其他客户端登录您被挤下线，如非本人操作，请立即修改密码！");
                } else { // 正常请求
                    // 重定向
                    log.debug("==踢出后用户重定向的路径kickoutUrl:" + kickoutUrl);
                    WebUtils.issueRedirect(request, response, kickoutUrl);
                }
                // 记录日志
                LogUtil.saveLogbyDB(httpRequest.getServletPath(), "账号被挤下线", httpRequest);
                // 会话被踢出了
                // 退出登录
                getUserService().kickout(httpRequest);
                saveRequest(request);
                return false;
            }
            return true;
        } catch (Exception e) {
            log.error("", e);
            // 重定向到登录界面
            WebUtils.issueRedirect(request, response, kickoutUrl);
            return false;
        }
    }

}
